notebooks/original R code/mova.R
In ku-awdc/EVI: Epidemic Volatility Index as an Early-Warning Tool
mova=function(cases, int=7){
ncases=rep(NA, length(cases))
for (i in 1:length(cases)){
ncases[i]=mean(cases[((i+1)-min(int,i)):i])
}
return(ncases)
}
#cases=mova(c(2,2,1,4),7)
ku-awdc/EVI documentation built on Dec. 7, 2023, 12:27 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
mova=function(cases, int=7){
ncases=rep(NA, length(cases))
for (i in 1:length(cases)){
ncases[i]=mean(cases[((i+1)-min(int,i)):i])
}
return(ncases)
}
#cases=mova(c(2,2,1,4),7)
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.